﻿Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        For II As Integer = 1 To 100
            CheckedListBox1.Items.Add(II)
        Next
    End Sub
End Class
